<?	
	/* Se asegura que el archivo es incluido por el index */
	defined( 'LOAD_MODULE_ACTION' ) or die( 'No esta permitido el acceso directo a ' . __FILE__ );  
		$this->oTmpObject = new Poesia_libre_frm( $this );
	
	class Poesia_libre_frm extends Frm
	{
	function setValue ( $ncPoesiaLibre )
		{
			$cSql = "SELECT  cdPoesiaLibre,  cPalabra1, cEstilo1,  cPalabra2,  cEstilo2, cPalabra3,  cEstilo3, cPalabra4, cEstilo4,  cPalabra5,  cEstilo5, cPalabra6,  cEstilo6,  cPalabra7,  cEstilo7, dDesde
				FROM gtPoesiaLibre
				WHERE ncPoesiaLibre = '$ncPoesiaLibre' ";
			$aDatos = $this->oDatabase->getArray($cSql);	
			$this->setFieldsArray ( $aDatos );
		}
	function Poesia_libre_frm( &$oModule )
		{
			$this->Frm( $oModule );
			//Crea los Objetos de los campos de edicion
			$this->aFields['ncPoesiaLibre']		= new Input( "Codigo" , "ncPoesiaLibre", '', false, true );
			$this->aFields['cdPoesiaLibre']		= new InputText( "Nombre", "cdPoesiaLibre" );
			$this->aFields['cPalabra1']				= new InputText( "Palabra 1", "cPalabra1" );
			$this->aFields['cPalabra2']				= new InputText( "Palabra 2",  "cPalabra2" );
			$this->aFields['cPalabra3']				= new InputText( "Palabra 3", "cPalabra3" );
			$this->aFields['cPalabra4']				= new InputText( "Palabra 4", "cPalabra4" );
			$this->aFields['cPalabra5']				= new InputText( "Palabra 5", "cPalabra5" );
			$this->aFields['cPalabra6']				= new InputText( "Palabra 6", "cPalabra6" );
			$this->aFields['cPalabra7']				= new InputText( "Palabra 7", "cPalabra7" );
			$this->aFields['cEstilo1']					= new InputText( "Estilo 1", "cEstilo1" );
			$this->aFields['cEstilo2']					= new InputText( "Estilo 2", "cEstilo2" );
			$this->aFields['cEstilo3']					= new InputText( "Estilo 3", "cEstilo3" );
			$this->aFields['cEstilo4']					= new InputText( "Estilo 4", "cEstilo4" );
			$this->aFields['cEstilo5']					= new InputText( "Estilo 5", "cEstilo5" );
			$this->aFields['cEstilo6']					= new InputText( "Estilo 6", "cEstilo6" );
			$this->aFields['cEstilo7']					= new InputText( "Estilo 7", "cEstilo7" );	
			$this->aFields['dDesde']					= new InputDate( "Desde", "dDesde" );	
		}	
	function initializeForm()
		{
			// Si viene el Ubicacion hace el retrieve
				if ( $this->isRetrievable() && $this->aFields['ncPoesiaLibre']->getValue() )
				{
					$this->setValue( $this->aFields['ncPoesiaLibre']->getValue() );
				}
			// Configura el Titulo
				$this->setLabel( "Poesia Libre" );	
			return true;
		}
	}
?>